From 8e7da0d0894d3347991f14f4ccbe94d09bdfbec8 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Fri, 14 Oct 2022 11:23:37 +1100 Subject: making using tor a user option --- luwak.el | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/luwak.el b/luwak.el index 224ce83..59a1ab1 100644 --- a/luwak.el +++ b/luwak.el @@ -28,6 +28,16 @@ (defcustom luwak-url-rewrite-function 'identity "Function to rewrite url before loading." :group 'luwak :type '(function)) +(defcustom luwak-tor-switch nil + "Switch behaviour of prefix arg concerning the use of tor. + +When nil, use tor by default, and not use it with a prefix arg. +When non-nill, swap the tor-switch in prefix-arg effect." + :group 'luwak :type '(boolean)) + +(defun luwak-toggle-tor-switch () + (interactive) + (setq luwak-tor-switch (not luwak-tor-switch))) (defun luwak-mode-name () (concat "luwak " @@ -53,7 +63,8 @@ (defun luwak-open (url) (interactive "sUrl to open: ") - (luwak-open-internal url current-prefix-arg 'luwak-add-to-history)) + (luwak-open-internal + url (xor luwak-tor-switch current-prefix-arg) 'luwak-add-to-history)) (defun luwak-copy-url () (interactive) -- cgit v1.2.3