From 1ced565816120bfcc351daf9fc3a4e851162e3b7 Mon Sep 17 00:00:00 2001 From: bd Date: Wed, 10 Jan 2024 19:44:21 -0700 Subject: Initial commit of new repository structure --- .config/emacs/modules/bd--eww.el | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 .config/emacs/modules/bd--eww.el (limited to '.config/emacs/modules/bd--eww.el') diff --git a/.config/emacs/modules/bd--eww.el b/.config/emacs/modules/bd--eww.el new file mode 100644 index 0000000..7bde428 --- /dev/null +++ b/.config/emacs/modules/bd--eww.el @@ -0,0 +1,25 @@ +;; -*- lexical-binding: t; -*- + + +;; do not use an external browser +(setopt browse-url-browser-function 'eww-browse-url + shr-use-fonts nil + shr-cookie-policy nil + shr-max-width 85 + ;; send only user agent + url-privacy-level '(email os emacs lastloc cookies) + eww-search-prefix "https://searx.be/search?q=" + eww-auto-rename-buffer 'title + eww-use-browse-url (regexp-opt '("mailto:" + "youtube.com" + "youtu.be" + "yewtu.be" + "vid.puffyan.us")) + browse-url-handlers + `((,(regexp-opt'("youtube.com" "youtu.be" "yewtu.be" "vid.puffyan.us")) . + (lambda (url &rest _) + (message "Ludu %s" url) + (start-process-shell-command "rip-video" nil (concat "rip-video " url)))))) + + +(provide 'bd--eww) -- cgit v1.2.3