[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Option to use Tor to communicate with repo site

From: Richard Stallman
Subject: Option to use Tor to communicate with repo site
Date: Sun, 13 Oct 2019 21:42:53 -0400

[[[ To any NSA and FBI agents reading my email: please consider    ]]]
[[[ whether defending the US Constitution against all enemies,     ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]

Would someone please install this?

2019-10-12  Richard Stallman  <address@hidden>

        * lisp/vc/vc-dispatcher.el (vc-tor): New user option.
        (vc-do-command): If vc-tor is non-nil, use torsocks.

The defcustom needs to say what version it is added in.

diff --git a/lisp/vc/vc-dispatcher.el b/lisp/vc/vc-dispatcher.el
index 40c392b..bf238de 100644
--- a/lisp/vc/vc-dispatcher.el
+++ b/lisp/vc/vc-dispatcher.el
@@ -267,6 +267,11 @@ vc-delistify
   ;; FIXME what about file names with spaces?
   (if (not filelist) "."  (mapconcat 'identity filelist " ")))
+(defcustom vc-tor nil
+  "If non-nil, communicate with the repository site via Tor."
+  :type 'boolean
+  :group 'vc)
 (defun vc-do-command (buffer okstatus command file-or-list &rest flags)
   "Execute a slave command, notifying user and checking for errors.
@@ -295,7 +300,8 @@ vc-do-command
         ;; due to potential truncation of long messages.
         (message-truncate-lines t)
-         (concat (if (string= (substring command -1) "\n")
+         (concat (if vc-tor "torsocks " "")
+                  (if (string= (substring command -1) "\n")
                      (substring command 0 -1)
                  " " (vc-delistify flags)

Dr Richard Stallman
Founder, Free Software Foundation (https://gnu.org, https://fsf.org)
Internet Hall-of-Famer (https://internethalloffame.org)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]