From ddb5b07e1e43c7b44877bae9d786dbb80ca95311 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Fri, 17 Jan 2025 09:48:03 +1100 Subject: [emacs] Adding buttons to infobox --- emacs/.emacs.d/lisp/my/my-web.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'emacs/.emacs.d/lisp/my/my-web.el') diff --git a/emacs/.emacs.d/lisp/my/my-web.el b/emacs/.emacs.d/lisp/my/my-web.el index 472cab6..6c3cd92 100644 --- a/emacs/.emacs.d/lisp/my/my-web.el +++ b/emacs/.emacs.d/lisp/my/my-web.el @@ -161,6 +161,9 @@ Useful for bypassing some paywalls." (my-url-as-googlebot (my-fetch-browse url no-overwrite))) +(require 'hmm) +(defvar my-url-context-function 'hmm-url "Context function for urls.") + (defun my-mastodon-url-p (url) "Guess if a url is a mastodon post. e.g. https://hostux.social/@fsf/113709722998924141 -- cgit v1.2.3