acdw/emacs
acdw
/
emacs
1
2
Fork 0
Code Issues 4 Pull Requests Releases Activity

Bindings and stuff

This commit is contained in:
Case Duckworth 2022-01-11 22:28:32 -06:00
parent e4f7ed9609
commit 2a119625e6
2 changed files with 14 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
init.el
View File

@ -574,7 +574,8 @@
(:require +tab-bar)
(:option tab-bar-tab-name-function '+tab-bar-tab-name-truncated-left
tab-bar-tab-name-truncated-max 20
tab-bar-tab-name-ellipsis truncate-string-ellipsis)
tab-bar-tab-name-ellipsis truncate-string-ellipsis
tab-bar-show t)
(tab-bar-mode +1)
(+tab-bar-misc-info-mode +1))
@ -970,9 +971,7 @@ See also `crux-reopen-as-root-mode'."
elfeed-search-title-max-width 78
elfeed-search-remain-on-entry t
elfeed-show-unique-buffers t
elfeed-db-directory (elfeed/ "db/" t)
elfeed-log 'debug ; until I can figure out syncing...
)
elfeed-db-directory (elfeed/ "db/" t))
(:+key "C-x w" #'elfeed)
(:with-mode elfeed-search-mode
(:bind "&" #'+elfeed-search-browse-generic)
@ -983,7 +982,8 @@ See also `crux-reopen-as-root-mode'."
(:with-mode elfeed-show-mode
(:bind "SPC" #'+elfeed-scroll-up-command
"S-SPC" #'+elfeed-scroll-down-command
"&" #'+elfeed-show-browse-generic)
"&" #'+elfeed-show-browse-generic
"RET" #'shr-browse-url)
(:hook #'reading-mode)
;; (define-advice elfeed-show-entry (:after (&rest _))
;; "Re-flow the entry a short time after showing it."
@ -1448,7 +1448,8 @@ See also `crux-reopen-as-root-mode'."
(:also-load vertico-directory
vertico-mouse
vertico-unobtrusive
vertico-multiform)
vertico-multiform
vertico-quick)
(vertico-mouse-mode +1)
(vertico-multiform-mode +1)
(:option vertico-multiform-commands '((execute-extended-command flat)
@ -1482,7 +1483,8 @@ See also `crux-reopen-as-root-mode'."
(:bind "RET" #'vertico-directory-enter
"DEL" #'vertico-directory-delete-char
"M-DEL" #'vertico-directory-delete-word
"TAB" #'+vertico-widen-or-complete))
"TAB" #'+vertico-widen-or-complete
"M-j" #'vertico-quick-insert))
(add-hook 'rfn-eshadow-update-overlay-hook #'vertico-directory-tidy))
(setup (:straight visual-fill-column)

10
lisp/+modeline.el
View File

@ -216,13 +216,13 @@ The order of elements matters: whichever one matches first is applied."
(:propertize (line-number-mode
((column-number-mode
(column-number-indicator-zero-based
,(concat before "%l" sep "%c" after)
,(concat before "%l" sep "%C" after))
,(concat before "%l" sep "" after)))
,(concat before "%3l" sep "%2c" after)
,(concat before "%3l" sep "%2C" after))
,(concat before "%3l" sep "" after)))
((column-number-mode
(column-number-indicator-zero-based
,(concat before sep "%c" after)
,(concat before sep "%C" after)))))
,(concat before sep "%2c" after)
,(concat before sep "%2C" after)))))
font-lock-face font-lock-comment-face))))
(defun +modeline-position (&optional _)