diff options
author | Case Duckworth | 2020-12-16 19:10:58 -0600 |
---|---|---|
committer | Case Duckworth | 2020-12-16 19:10:58 -0600 |
commit | 9ffba44d97d15d82adc9e676aa6e3a1b6dfea2db (patch) | |
tree | 1fb8cc9548b5d0c3e5689ff41171124f930b30e5 | |
parent | Change init.el to load config.org if it’s newer (diff) | |
download | emacs-9ffba44d97d15d82adc9e676aa6e3a1b6dfea2db.tar.gz emacs-9ffba44d97d15d82adc9e676aa6e3a1b6dfea2db.zip |
Reorganize completing-read stuff
-rw-r--r-- | config.org | 109 |
1 files changed, 60 insertions, 49 deletions
diff --git a/config.org b/config.org index 72aeea4..8c2f7be 100644 --- a/config.org +++ b/config.org | |||
@@ -4,7 +4,7 @@ | |||
4 | #+EXPORT_FILE_NAME: README.md | 4 | #+EXPORT_FILE_NAME: README.md |
5 | #+OPTIONS: toc:nil | 5 | #+OPTIONS: toc:nil |
6 | #+BANKRUPTCY_COUNT: 3 | 6 | #+BANKRUPTCY_COUNT: 3 |
7 | #+Time-stamp: <2020-12-16 08:20:58 acdw> | 7 | #+Time-stamp: <2020-12-16 16:48:46 aduckworth> |
8 | 8 | ||
9 | Let’s configure Emacs using Org mode, they said. It’ll be fun, they said. | 9 | Let’s configure Emacs using Org mode, they said. It’ll be fun, they said. |
10 | 10 | ||
@@ -435,65 +435,76 @@ from [[https://stackoverflow.com/questions/23659909/reverse-evaluation-order-of- | |||
435 | 435 | ||
436 | * Interactivity | 436 | * Interactivity |
437 | 437 | ||
438 | ** Selectrum | 438 | ** Completing-read |
439 | |||
440 | *** Shadow file names | ||
439 | 441 | ||
440 | #+begin_src emacs-lisp | 442 | #+begin_src emacs-lisp |
441 | (use-package selectrum | 443 | (cuss file-name-shadow-properties |
442 | :config | 444 | '(invisible t)) |
443 | (selectrum-mode +1)) | 445 | |
446 | (file-name-shadow-mode +1) | ||
444 | #+end_src | 447 | #+end_src |
445 | 448 | ||
446 | ** Prescient | 449 | *** Selectrum |
447 | 450 | ||
448 | #+begin_src emacs-lisp | 451 | #+begin_src emacs-lisp |
449 | (use-package prescient | 452 | (use-package selectrum |
450 | :config | 453 | :config |
451 | (prescient-persist-mode +1)) | 454 | (selectrum-mode +1)) |
455 | #+end_src | ||
452 | 456 | ||
453 | (use-package selectrum-prescient | 457 | *** Prescient |
454 | :after (selectrum prescient) | ||
455 | :config | ||
456 | (selectrum-prescient-mode +1)) | ||
457 | #+end_src | ||
458 | 458 | ||
459 | ** Consult | 459 | #+begin_src emacs-lisp |
460 | (use-package prescient | ||
461 | :config | ||
462 | (prescient-persist-mode +1)) | ||
463 | |||
464 | (use-package selectrum-prescient | ||
465 | :after (selectrum prescient) | ||
466 | :config | ||
467 | (selectrum-prescient-mode +1)) | ||
468 | #+end_src | ||
460 | 469 | ||
461 | #+begin_src emacs-lisp | 470 | *** Consult |
462 | (use-package consult | ||
463 | :after (selectrum) | ||
464 | :straight (consult | ||
465 | :host github | ||
466 | :repo "minad/consult") | ||
467 | :bind | ||
468 | (("C-x b" . consult-buffer) | ||
469 | ("C-x 4 b" . consult-buffer-other-window) | ||
470 | ("C-x 5 b" . consult-buffer-other-frame) | ||
471 | ("M-g o" . consult-outline) | ||
472 | ("M-g l" . consult-line) | ||
473 | ("M-y" . consult-yank-pop) | ||
474 | ("<help> a" . consult-apropos)) | ||
475 | :init | ||
476 | (fset 'multi-occur #'consult-multi-occur)) | ||
477 | 471 | ||
478 | (use-package consult-selectrum | 472 | #+begin_src emacs-lisp |
479 | :straight (consult-selectrum | 473 | (use-package consult |
480 | :host github | 474 | :after (selectrum) |
481 | :repo "minad/consult")) | 475 | :straight (consult |
482 | #+end_src | 476 | :host github |
477 | :repo "minad/consult") | ||
478 | :bind | ||
479 | (("C-x b" . consult-buffer) | ||
480 | ("C-x 4 b" . consult-buffer-other-window) | ||
481 | ("C-x 5 b" . consult-buffer-other-frame) | ||
482 | ("M-g o" . consult-outline) | ||
483 | ("M-g l" . consult-line) | ||
484 | ("M-y" . consult-yank-pop) | ||
485 | ("<help> a" . consult-apropos)) | ||
486 | :init | ||
487 | (fset 'multi-occur #'consult-multi-occur)) | ||
488 | |||
489 | (use-package consult-selectrum | ||
490 | :straight (consult-selectrum | ||
491 | :host github | ||
492 | :repo "minad/consult")) | ||
493 | #+end_src | ||
483 | 494 | ||
484 | ** Marginalia | 495 | *** Marginalia |
485 | 496 | ||
486 | #+begin_src emacs-lisp | 497 | #+begin_src emacs-lisp |
487 | (use-package marginalia | 498 | (use-package marginalia |
488 | :straight (marginalia | 499 | :straight (marginalia |
489 | :host github | 500 | :host github |
490 | :repo "minad/marginalia" | 501 | :repo "minad/marginalia" |
491 | :branch "main") | 502 | :branch "main") |
492 | :init | 503 | :init |
493 | (marginalia-mode +1) | 504 | (marginalia-mode +1) |
494 | (cuss marginalia-annotators '(marginalia-annotators-heavy | 505 | (cuss marginalia-annotators '(marginalia-annotators-heavy |
495 | marginalia-annotators-light))) | 506 | marginalia-annotators-light))) |
496 | #+end_src | 507 | #+end_src |
497 | 508 | ||
498 | ** Ignore case | 509 | ** Ignore case |
499 | 510 | ||