chris/emacs
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

nov-mode and bookmarks

Browse source
This commit is contained in:
Chris Cochrun 2021-09-12 07:27:33 -05:00
parent 689c811bba
commit 58ccd2197c
2 changed files with 85 additions and 59 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
README.org
View file

@ -604,7 +604,8 @@ Consult has a lot of nice functions like Ivy's Counsel functions (enhanced searc
:states 'normal
:keymaps 'override
"si" 'consult-imenu
"so" 'consult-org-heading))
"so" 'consult-org-heading
"sm" 'bookmark-jump))
#+end_src
*** MARGINALIA
@ -1209,6 +1210,7 @@ Part of this config includes some special capture templates for my work as a you
"RET" 'chris/org-dwim-at-point
"gC" 'chris/org-columns-view
"ge" 'org-edit-src-code
"gr" 'revert-buffer
"t" 'org-todo)
('insert org-mode-map
"C-i" 'completion-at-point)
@ -1887,7 +1889,16 @@ Let's use pdf-tools for a lot better interaction with pdfs.
(use-package nov
:mode ("\\.epub\\'" . nov-mode)
:config
(add-hook 'nov-mode-hook 'visual-fill-column-mode))
(defun chris/setup-nov-mode
(interactive)
(visual-fill-column-mode)
(display-line-numbers-mode -1)
(variable-pitch-mode +1)
(setq visual-fill-column-width 100
visual-fill-column-center-text t))
(add-hook 'nov-mode-hook 'chris/setup-nov-mode))
#+end_src
** EAF (Emacs Application Framework)
@ -1920,7 +1931,9 @@ interfere with the default `bongo-playlist-buffer'."
(enclosure (elt (car (elfeed-entry-enclosures entry)) 0))
(url (if (string-prefix-p "https://thumbnails" enclosure)
link
enclosure))
(if (string= enclosure nil)
link
enclosure)))
(title (elfeed-entry-title entry))
(bongo-pl chris/elfeed-bongo-playlist)
(buffer (get-buffer-create bongo-pl)))

23
init.el
View file

@ -67,7 +67,7 @@
;; ...especially on linux
(setq x-gtk-use-system-tooltips nil)
;; Favor vertical splits over horizontal ones. Screens are usually wide.
;; Favor vertical splits over horizontal ones. Screens are usually wide.
(setq split-width-threshold 160
split-height-threshold nil)
@ -101,7 +101,7 @@
(straight-use-package 'use-package)
(setq use-package-verbose t)
(use-package command-log-mode
(use-package command-log-mode
:commands command-log-mode)
(use-package all-the-icons)
@ -344,7 +344,8 @@ vertically."
:states 'normal
:keymaps 'override
"si" 'consult-imenu
"so" 'consult-org-heading))
"so" 'consult-org-heading
"sm" 'bookmark-jump))
(use-package marginalia
:bind (:map minibuffer-local-map
@ -811,6 +812,7 @@ vertically."
"RET" 'chris/org-dwim-at-point
"gC" 'chris/org-columns-view
"ge" 'org-edit-src-code
"gr" 'revert-buffer
"t" 'org-todo)
('insert org-mode-map
"C-i" 'completion-at-point)
@ -1414,7 +1416,16 @@ If on a:
(use-package nov
:mode ("\\.epub\\'" . nov-mode)
:config
(add-hook 'nov-mode-hook 'visual-fill-column-mode))
(defun chris/setup-nov-mode
(interactive)
(visual-fill-column-mode)
(display-line-numbers-mode -1)
(variable-pitch-mode +1)
(setq visual-fill-column-width 100
visual-fill-column-center-text t))
(add-hook 'nov-mode-hook 'chris/setup-nov-mode))
(use-package eaf
:straight (:host github :repo "manateelazycat/emacs-application-framework"
@ -1440,7 +1451,9 @@ interfere with the default `bongo-playlist-buffer'."
(enclosure (elt (car (elfeed-entry-enclosures entry)) 0))
(url (if (string-prefix-p "https://thumbnails" enclosure)
link
enclosure))
(if (string= enclosure nil)
link
enclosure)))
(title (elfeed-entry-title entry))
(bongo-pl chris/elfeed-bongo-playlist)
(buffer (get-buffer-create bongo-pl)))