diff options
author | Yuchen Pei <id@ypei.org> | 2023-10-30 22:40:52 +1100 |
---|---|---|
committer | Yuchen Pei <id@ypei.org> | 2023-10-30 22:40:52 +1100 |
commit | 94643dfd001fa66319d857fa260d15e543ea9f5d (patch) | |
tree | 24dd4c8e7d02084f505511acd563c319cf4b82f0 /emacs/.emacs.d/init/ycp-web.el | |
parent | b855235fea42f793eb71a1508acdb8e651ea7a7c (diff) |
[emacs] Adding traclicker and url-rewrite, as well as customizations
Diffstat (limited to 'emacs/.emacs.d/init/ycp-web.el')
-rw-r--r-- | emacs/.emacs.d/init/ycp-web.el | 94 |
1 files changed, 94 insertions, 0 deletions
diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el index a81c2b0..f6da859 100644 --- a/emacs/.emacs.d/init/ycp-web.el +++ b/emacs/.emacs.d/init/ycp-web.el @@ -61,6 +61,100 @@ (require 'osm-ol) ) +(my-package url-rewrite + (setq my-nitter-hosts + '("nitter.net" + "nitter.nixnet.services" + "nitter.unixfox.eu" + "nitter.mint.lgbt" + "nitter.esmailelbob.xyz" + "nitter.poast.org" + "nitter.cz" + "nitter.privacydev.net" + "nitter.projectsegfau.lt" + "nitter.eu.projectsegfau.lt" + "nitter.in.projectsegfau.lt" + "nitter.us.projectsegfau.lt" + "nitter.soopy.moe" + "nitter.rawbit.ninja" + "nitter.d420.de" + "bird.habedieeh.re" + "nitter.x86-64-unknown-linux-gnu.zip" + "nitter.woodland.cafe" + "nitter.dafriser.be" + "nitter.catsarch.com" + "nitter.perennialte.ch" + "nitter.salastil.com" + "n.populas.no" + "nt.ggtyler.dev" + "nitter.uni-sonia.com" + "n.opnxng.com" + "nitter.ktachibana.party" + "nitter.tinfoil-hat.net")) + (setq my-invidious-hosts + '("yewtu.be" + "invidious.io.lol" + "invidious.slipfox.xyz" + "invidious.drgns.space" + "invidious.protokolla.fi" + "invidious.flokinet.to" + "iv.ggtyler.dev" + "yt.drgnz.club" + "invidious.lunar.icu" + "invidious.private.coffee" + "invidious.fdn.fr" + "vid.puffyan.us" + "invidious.asir.dev" + "onion.tube" + "iv.melmac.space" + "invidious.projectsegfau.lt" + "inv.in.projectsegfau.lt" + "invidious.privacydev.net" + "iv.datura.network" + "inv.tux.pizza" + "iv.nboeck.de" + "invidious.perennialte.ch" + "yt.oelrichsgarcia.de" + "inv.citw.lgbt" + "inv.zzls.xyz" + "invidious.einfachzocken.eu" + "yt.cdaut.de" + "yt.artemislena.eu" + "vid.priv.au" + "anontube.lvkaszus.pl" + "invidious.no-logs.com")) + (setq url-rw-rules + '((:name ddg-result + :description "duckduckgo result transform." + :match (concat url-rw-www-re (rx "duckduckgo.com/l/?uddg=")) + :actions ((replace-by-redirect "uddg"))) + (:name google-to-ddg + :description "Google search to duckduckgo html." + :match (concat url-rw-www-re (rx "google.com/search?q=")) + :actions ((replace-host "html.duckduckgo.com") + (replace-path "/html"))) + (:name reddit-to-old + :description "Reddit to old Reddit" + :match (concat url-rw-www-re (rx "reddit.com")) + :actions ((replace-host "old.reddit.com"))) + (:name strip-utm + :description "Strip utm_* queries." + :match "\\<utm_[a-z_]+=" + :actions ((remove-query "utm_.*"))) + (:name twitter-to-nitter + :description "Twitter to a random nitter instance." + :match (concat url-rw-www-re (rx "twitter.com")) + :actions ((replace-random-host my-nitter-hosts))) + (:name youtube-to-invidious + :description "YouTube to a random invidious instance." + :match (concat url-rw-www-re (rx (or "youtube.com" + "youtu.be" + "m.youtube.com"))) + :actions ((replace-random-host my-invidious-hosts))))) + (setq url-rw-extra-rewriters '(url-rewrite-example-zoom-to-dial)) + (url-rw-refresh) + ) + (my-package hnreader (:delay 30) (require 'my-hnreader) |