[emacs] Adding bom.el

Also strip fbclid from urls

2 files changed, 7 insertions, 0 deletions

diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el
index d672c3a..31d0528 100644
--- a/emacs/.emacs.d/init/ycp-web.el
+++ b/emacs/.emacs.d/init/ycp-web.el
@@ -61,6 +61,9 @@
   (require 'osm-ol)
   )
 
+(my-package bom
+  (:delay 30))
+
 (my-package url-rewrite
   (setq my-nitter-hosts
         '("nitter.net"
@@ -147,6 +150,10 @@
                  :description "Strip utm_* queries."
                  :match "\\<utm_[a-z_]+="
                  :actions ((remove-query "utm_.*")))
+          (:name strip-fbclid
+                 :description "Strip utm_* queries."
+                 :match "\\<fbclid="
+                 :actions ((remove-query "fbclid")))
           (:name twitter-to-nitter
                  :description "Twitter to a random nitter instance."
                  :match (concat url-rw-www-re (rx "twitter.com"))
diff --git a/emacs/.emacs.d/lisp/bom.el b/emacs/.emacs.d/lisp/bom.el
new file mode 160000
+Subproject f6e2215acee2126f75d611fda56242c4b7437c9