howard/hamacs
howard/hamacs
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add a leader key for EWW

Browse source
This commit is contained in:
Howard Abrams 2022-02-10 23:16:24 -08:00
parent fb01aa4728
commit 83e8f635d5
1 changed files with 14 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
ha-config.org
View file

@ -1038,7 +1038,7 @@ Often, but not always, I want a perspective based on an actual Git repository, e
"Create a new perspective, and then switch to the PROJECT using projectile. "Create a new perspective, and then switch to the PROJECT using projectile.
If NAME is not given, then figure it out based on the name of the If NAME is not given, then figure it out based on the name of the
PROJECT. If FILES aren't specified, then see if there is a PROJECT. If FILES aren't specified, then see if there is a
README. Otherwise, pull up a dired." README. Otherwise, pull up Dired."
(interactive (list (projectile-completing-read "Project: " projectile-known-projects))) (interactive (list (projectile-completing-read "Project: " projectile-known-projects)))
(when (f-directory-p project) (when (f-directory-p project)
(unless name (unless name
@ -1218,21 +1218,23 @@ Pushing directly to the upstream branch is /bad form/, as one should create a pu
Web pages look pretty good with EWW, but I'm having difficulty getting it to render a web search from DuckDuck. Web pages look pretty good with EWW, but I'm having difficulty getting it to render a web search from DuckDuck.
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(use-package eww (use-package eww
:init :init
(setq browse-url-browser-function 'eww-browse-url (setq browse-url-browser-function 'eww-browse-url
browse-url-secondary-browser-function 'browse-url-default-browser browse-url-secondary-browser-function 'browse-url-default-browser
eww-browse-url-new-window-is-tab nil eww-browse-url-new-window-is-tab nil
shr-use-colors nil shr-use-colors nil
shr-use-fonts t ; I go back and forth on this one shr-use-fonts t ; I go back and forth on this one
; shr-discard-aria-hidden t ; shr-discard-aria-hidden t
shr-bullet "• " shr-bullet "• "
shr-inhibit-images nil ; Gotta see the images shr-inhibit-images nil ; Gotta see the images
; shr-blocked-images '(svg) ; shr-blocked-images '(svg)
; shr-folding-mode nil ; shr-folding-mode nil
url-privacy-level '(email)) url-privacy-level '(email))
:config :config
(ha-leader "a b" '("eww browser" . eww))
(evil-define-key 'normal eww-mode-map (kbd "Y") 'eww-copy-page-url) (evil-define-key 'normal eww-mode-map (kbd "Y") 'eww-copy-page-url)
(evil-define-key 'normal eww-mode-map (kbd "L") 'eww-list-bookmarks) (evil-define-key 'normal eww-mode-map (kbd "L") 'eww-list-bookmarks)
(evil-define-key 'normal eww-buffers-mode-map (kbd "q") 'eww-bookmark-kill) (evil-define-key 'normal eww-buffers-mode-map (kbd "q") 'eww-bookmark-kill)